(iso-transl-define-keys): Fix paren error in prev change.

diff --git a/lisp/international/iso-transl.el b/lisp/international/iso-transl.el
index c322a6899a0f80e76f502493c9f2385312730a68..ace46b6ccaa9fa4ff7eb3fa60a08069ff62f9202 100644 (file)
--- a/lisp/international/iso-transl.el
+++ b/lisp/international/iso-transl.el
@@ -230,8 +230,8 @@ sequence VECTOR.  (VECTOR is normally one character long.)")
              (aset deadvec 0 deadkey)
              (define-key isearch-mode-map (vector deadkey) nil)
              (define-key key-translation-map deadvec (cdr (car alist)))))
-       (setq tail (cdr tail)))))
-  (setq alist (cdr alist)))
+       (setq tail (cdr tail))))
+    (setq alist (cdr alist))))
 
 (defun iso-transl-set-language (lang)
   (interactive (list (let ((completion-ignore-case t))